home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 24
/
CU Amiga Magazine's Super CD-ROM 24 (1998)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1998-07].iso
/
CDSupport
/
UpDateCopy
/
Scripts
/
BackUpUp
next >
Wrap
Text File
|
1997-02-21
|
2KB
|
118 lines
.k ""
set sour dh0: ;default source directory !
set dest hd0: ;default destination directory!
echo "source ? (for $sour press ENTER)"
set >nil: sour ?
echo "destination ? (for $dest press ENTER)"
set >nil: dest ?
set e ""
set s ""
echo "all (n/y) ? (for y press ENTER)"
set >nil: s ?
if "$s" eq "$e"
set a all
else
set a ""
endif
ask "deep (y/n) ? (for n press ENTER)*N"
if warn
set d deep
else
set d ""
endif
set s ""
echo "force (n/y) ? (for y press ENTER)"
set >nil: s ?
if "$s" eq "$e"
set f force
else
set f ""
endif
set s ""
echo "quiet (n/y) ? (for y press ENTER)"
set >nil: s ?
if "$s" eq "$e"
set q quiet
else
set q ""
endif
ask "PRINT (y/n) ? (for n press ENTER)*N"
if warn
set p print
else
set p ""
endif
set s ""
echo "OK TO CONTINUE (n/y) ? (for y press ENTER)"
set >nil: s ?
if "$s" not eq "$e"
echo "*N*N Abort!*N*N"
skip exit
endif
date >env:start
echo "*N start:" $start
echo "*NExecution of the:"
echo " updatecopy " $sour $dest $a $d $f $q $p
echo "(abort pressing CTRL+C !)*N"
if $p eq print
updatecopy $sour $dest $a $d $f $q >prt:
else
updatecopy $sour $dest $a $d $f $q
endif
if $q not eq quiet
echo "*N start:" $start
endif
date >env:stop
echo "*N stop:" $stop
set b1 .backdrop
set b2 .backdrop-
set b3 .backdrop.info
set b4 .backdrop-.info
if exists $dest$b1
set s ""
echo "*NRENAME $dest$b1 AS $dest$b2 (n/y) ? (for y press ENTER)"
set >nil: s ?
if "$s" eq "$e"
if exists $dest$b2
delete $dest$b2 forced quiet
endif
rename $dest$b1 $dest$b2
if exists $dest$b3
if exists $dest$b4
delete $dest$b4 forced quiet
endif
rename $dest$b3 $dest$b4
endif
else
set q ""
endif
endif
lab exit
echo "*N*N For exit click to the close gadget!"